%% Input file name: contrastes/potencia.fig
%% FIG version: 3.2
%% Orientation: Landscape
%% Justification: Flush Left
%% Units: Inches
%% Paper size: A4
%% Magnification: 100.0
%% Resolution: 1200ppi
%% Include the following in the preamble:
%% \usepackage{textcomp}
%% End

\begin{pspicture}(6.03cm,3.45cm)(16.66cm,13.45cm)
\psset{unit=0.8cm}
\newrgbcolor{mycolor0}{1.00 0.50 0.31}\definecolor{mycolor0}{rgb}{1.00,0.50,0.31}
\newrgbcolor{mycolor1}{0.28 0.46 1.00}\definecolor{mycolor1}{rgb}{0.28,0.46,1.00}
%%
%% Depth: 100
%%
\psset{linestyle=solid,linewidth=0.03175,fillstyle=none}
\psline(10.23,6.43)(20.31,6.43)(20.31,15.24)(10.23,15.24)(10.23,6.43)
\rput(15.27,15.99){Curvas de potencia de un contraste unilateral de menor con $\alpha=0.05$}
\rput(15.27,4.82){Proporción verdadera}
\rput{90}(8.5,10.84){Potencia}
\psline[linecolor=gray](10.23,6.76)(20.31,6.76)
\psline(10.61,6.43)(19.94,6.43)
\psline(10.61,6.43)(10.61,6.22)
\psline(12.47,6.43)(12.47,6.22)
\psline(14.34,6.43)(14.34,6.22)
\psline(16.21,6.43)(16.21,6.22)
\psline(18.07,6.43)(18.07,6.22)
\psline(19.94,6.43)(19.94,6.22)
\rput(10.61,5.67){0.0}
\rput(12.47,5.67){0.2}
\rput(14.34,5.67){0.4}
\rput(16.21,5.67){0.6}
\rput(18.07,5.67){0.8}
\rput(19.94,5.67){1.0}
\psline(10.23,6.76)(10.23,14.91)
\psline(10.23,6.76)(10.02,6.76)
\psline(10.23,8.39)(10.02,8.39)
\psline(10.23,10.02)(10.02,10.02)
\psline(10.23,11.65)(10.02,11.65)
\psline(10.23,13.28)(10.02,13.28)
\psline(10.23,14.91)(10.02,14.91)
\rput[r](9.73,6.76){0.0}
\rput[r](9.73,8.39){0.2}
\rput[r](9.73,10.02){0.4}
\rput[r](9.73,11.65){0.6}
\rput[r](9.73,13.28){0.8}
\rput[r](9.73,14.91){1.0}
\psline[linecolor=mycolor0](10.61,14.91)(10.70,14.88)(10.80,14.78)(10.89,14.63)(10.99,14.43)(11.08,14.20)(11.17,13.94)(11.27,13.65)(11.36,13.36)(11.46,13.05)(11.55,12.73)(11.64,12.41)(11.74,12.09)(11.83,11.77)(11.93,11.46)(12.02,11.15)(12.12,10.85)(12.21,10.57)(12.30,10.29)(12.40,10.03)(12.49,9.77)(12.59,9.53)(12.68,9.31)(12.78,9.09)(12.87,8.89)(12.96,8.70)(13.06,8.53)(13.15,8.36)(13.25,8.21)(13.34,8.07)(13.43,7.94)(13.53,7.82)(13.62,7.71)(13.72,7.61)(13.81,7.52)(13.91,7.43)(14.00,7.36)(14.09,7.29)(14.19,7.22)(14.28,7.17)(14.38,7.12)(14.47,7.07)(14.56,7.03)(14.66,7.00)(14.76,6.96)(14.85,6.94)(14.94,6.91)(15.04,6.89)(15.13,6.87)(15.23,6.85)(15.32,6.84)(15.41,6.83)(15.51,6.82)(15.60,6.81)(15.70,6.80)(15.79,6.79)(15.89,6.79)(15.98,6.78)(16.07,6.78)(16.17,6.77)(16.26,6.77)(16.36,6.77)(16.45,6.77)(16.54,6.76)(16.64,6.76)(16.73,6.76)(16.83,6.76)(16.92,6.76)(17.02,6.76)(17.11,6.76)(17.20,6.76)(17.30,6.76)(17.39,6.76)(17.49,6.76)(17.58,6.76)(17.68,6.76)(17.77,6.76)(17.86,6.76)(17.96,6.76)(18.05,6.76)(18.15,6.76)(18.24,6.76)(18.33,6.76)(18.43,6.76)(18.52,6.76)(18.62,6.76)(18.71,6.76)(18.81,6.76)(18.90,6.76)(18.99,6.76)(19.09,6.76)(19.18,6.76)(19.28,6.76)(19.37,6.76)(19.47,6.76)(19.56,6.76)(19.66,6.76)(19.75,6.76)(19.84,6.76)(19.94,6.76)
\psline[linecolor=mycolor0](17.5,14.49)(18,14.49)
\rput[l](18.1,14.49){$n=10$}
\psline[linecolor=mycolor1](10.61,14.91)(10.70,14.91)(10.80,14.91)(10.89,14.91)(10.99,14.91)(11.08,14.91)(11.17,14.91)(11.27,14.91)(11.36,14.91)(11.46,14.91)(11.55,14.91)(11.64,14.91)(11.74,14.91)(11.83,14.91)(11.93,14.91)(12.02,14.91)(12.12,14.91)(12.21,14.91)(12.30,14.91)(12.40,14.91)(12.49,14.91)(12.59,14.91)(12.68,14.91)(12.78,14.91)(12.87,14.91)(12.96,14.91)(13.06,14.91)(13.15,14.90)(13.25,14.89)(13.34,14.88)(13.43,14.84)(13.53,14.78)(13.62,14.70)(13.72,14.56)(13.81,14.36)(13.91,14.09)(14.00,13.75)(14.09,13.31)(14.19,12.80)(14.28,12.21)(14.38,11.58)(14.47,10.91)(14.56,10.25)(14.66,9.61)(14.76,9.02)(14.85,8.50)(14.94,8.06)(15.04,7.70)(15.13,7.42)(15.23,7.21)(15.32,7.05)(15.41,6.94)(15.51,6.87)(15.60,6.82)(15.70,6.79)(15.79,6.78)(15.89,6.77)(15.98,6.76)(16.07,6.76)(16.17,6.76)(16.26,6.76)(16.36,6.76)(16.45,6.76)(16.54,6.76)(16.64,6.76)(16.73,6.76)(16.83,6.76)(16.92,6.76)(17.02,6.76)(17.11,6.76)(17.20,6.76)(17.30,6.76)(17.39,6.76)(17.49,6.76)(17.58,6.76)(17.68,6.76)(17.77,6.76)(17.86,6.76)(17.96,6.76)(18.05,6.76)(18.15,6.76)(18.24,6.76)(18.33,6.76)(18.43,6.76)(18.52,6.76)(18.62,6.76)(18.71,6.76)(18.81,6.76)(18.90,6.76)(18.99,6.76)(19.09,6.76)(19.18,6.76)(19.28,6.76)(19.37,6.76)(19.47,6.76)(19.56,6.76)(19.66,6.76)(19.75,6.76)(19.84,6.76)(19.94,6.76)
\psline[linecolor=mycolor1](17.5,14.07)(18,14.07)
\rput[l](18.1,14.07){$n=100$}
\psline[linestyle=dashed,linecolor=gray](14.34,6.43)(14.34,7.13)(10.23,7.13)
\psline(10.23,7.13)(10.02,7.13)
\rput[r](9.73,7.13){0.05}
\psline[linestyle=dashed,linecolor=gray](14.34,6.43)(14.34,11.75)(10.23,11.75)
\psline(10.23,11.75)(10.02,11.75)
\rput[r](9.73,11.92){0.62}
\end{pspicture}
%% End
